home *** CD-ROM | disk | FTP | other *** search
/ ArtRageous! the Amazing World of Art / ArtRageous - The Amazing World of Art (1995)(Softkey).iso / data / artmain.dir / 00097_Script_97 < prev   
Text File  |  1995-12-14  |  559b  |  22 lines
  1. on clickVRHotSpotWin pHotspotID
  2.   global gPanoMovieObj
  3.   
  4.   put gPanoMovieObj (mGetHotSpotName) into theHotspotName
  5.   
  6.   if word 1 of theHotspotName = "go" then
  7.     set the picture of cast "QTVR placeholder" to the picture of cast "QTVR black placeholder"
  8.     ClosePanoMovieWin
  9.     gosection (word 2 of theHotSpotName)
  10.     exit
  11.   end if
  12.   
  13.   -- puppetTransition 51, 2
  14.   if not(the labelList contains theHotSpotName) then exit
  15.   if theHotSpotName = "" then exit
  16.   
  17.   go frame theHotSpotName
  18.   ClosePanoMovieWin
  19.   cursor 200
  20.   cursor 4
  21. end
  22.